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Editorial 


E l mes de octubre nos sorprende en un viaje por las regiones de Chile 
para dar a conocer a los miles de usuarios las innumerables 
posibilidades de su computador como opción para seguir creciendo 
en conocimientos y equipos hacia niveles superiores. 

Este primer viaje lo desarrollamos en Tarapacá y principalmente 
en la ciudad de tquique, para mostrar su realidad. En números siguientes 
repetiremos la experiencia en otras regiones. Escríbanos para dar prioridad 
a su zona. 

En forma adicional MUNDOATARI obsequiará en la región visitada 
una cantidad importante de ejemplares y ofrecerá descuentos especiales 
para suscripciones a su revista amiga. 

En este número estamos destacando un periférico muy apreciado 
FX)r ios usuarios de ATARI; la Unidad de Disco o Dríve. Presentamos una 
evaluación del software más importante para su biblioteca personal. 

Para los nuevos usuarios que consideran el Orive como posibilidad 
de ampliación de su equipo hacemos una oferta especial a precio rebajado 
y con garantía exclusiva de MUNDOATARI. 

El lenguaje TURBO-BASIC con su columna de continuidad permitirá 
nuevas facilidades de programación para ios conocedores del ATARI 
BASIC. Esperamos programas originales de nuestros lectores para que 
sean publicados y reciban premios de estímulo. 

El concurso del nuevo Video XE es una realidad. Ya existe un feliz 
ganador del primer euipo sorteado, como se puede apreciar en la página 
35 de este número. 

Finalizamos esta editorial afirmando que MUNDOATARI es su 
revista amiga y que estará permanentemente preocupada por mantenerse 
vigente y corresponder a las necesidades de sus miles de lectores. 
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Esta revista no mantiene relación 
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con respecto a los fabricantes 
de microcomputadores ATARI 
ni sus representantes. 

El contenido de ia publicidad es 
responsabilidad de los avisadores. 

Prohibida la reproducción total 
o parcial de esta revista sin la 
autorización escrita de los editores. 
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PROGRAMAS 


Los mejores pp^ramas 
para el Orive 

[Unidad de Disco] 




MUNDOATARI ha seleccionado 
los mejores programas para el Orive. 

Para ello recurrió a diversas fuentes 
{programadores experimentados y otros), 
el ranking de ventas por Catálogo 
e información de revistas norteamericanas 
especializadas. 

El resultado de ella es este articulo, 
que presenta una novedosa clasificación 
de las posibilidades de uso 
del Orive ATARI. 
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PROGRAMAS: continuación 



LENGUAJES 

- BASIC 

- Turbo BASIC 

- LOGO 

- Pilot 

- Pascal 

- LISP 


- ASSEMBLER 




Una posibilidad para quienes ven 
en el ATARI una herramienta de 
entretención. 

Los más solicitados han sido; 

SIMULADORES 
— F-15: Strike Eagle 
— Solo Flight 
ESTRATEGIA 
— Zorro 

— Spy v/s Spy III 
ARCADE 

— Shooting Galery 
— Space Invaders 
NUEVOS 

— Tomahawk 
— Ace of Aces 
— Spitfire 80 

— The Domain of the Undead 
ANTIGUOS 
— Joust 
— Pengo 
— Frogger 
— Pacman 
DEPORTES 

— Winter Olympic 
— Karate Champion 
— Ninja 

AUTOMOVILISMO 
— The last V8 
— Grand Prix 
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PROGRAMAS: continuación 


SISTEMAS 

OPERATIVOS 

lia Unidad de Disco 1050 y la 
XF-551 vienen con el antiguo y 
popular DOS 2.5, que permite 
formatear diskettes hasta una 
densidad 1,5 y por un solo lado, 
Otras posibilidadés son: 

— Sparta DOS versión 1.0 

— Sparta DOS versión 3.2 

- DOS 4.0 

- Smart DOS. 




PROGRAMACION 

Para el autoaprendizaje y supe¬ 
ración persona! en el manejo del 
computador destacamos: 

— 33 lecciones para mi ATAR! 

— DOS 2.5: 1050 

— BASIC avanzado 

— Mapa de memoria 

— Técnicas de programación 


APLICACION 

PROFESIONAL 

El ATARI mediante programas 
especCficos puede realizar tareas 
al igual que otros computadores 
de mayor precio y capacidad: 

— Contabilidad 

— Stock y Facturación 

— Ingresos y Gastos 

— Contabilidad familiar. 
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MUSICA 

Los usuarios con habilidad y ta¬ 
lento musical encuentran en e! 
ATARI una herramienta de pro¬ 
gramación y ejecución musical: 

— Music Painter 

— Música 

— Music Composer. 


RUTINAS 
DE PROGRAMACION 


Para aquellos programadores que 
desean trabajar en forma estruc¬ 
turada existen programas que 
incluyen subrutinas en bloques 
para agregar a sus programas y 
asi' ganar en eficiencia. Algunos 
de ellos son los siguientes: 

— 40 rutinas para ATARI 

— 40 runinas USR 

— 40 rutinas de Gráficos 

— 40 rutinas de Programación 

— Colección Papie 

— Paginaseis 

— Colección Abacus. 


GRAFICOS 
Y DISEÑOS 


La versatilidad gráfica del com¬ 
putador ATARI quedan de ma¬ 
nifiesto al usar alguno de ios 
muchos programas disponi¬ 
bles para gráficos: 


— Rambrandt 

— Koala 

— Paint 

— ATARI Artist, 
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PROGRAMAS: continuación 


EDUCACION 


MUNDOATARI ha asumido un 
compromiso permanente con el 
quehacer educacional. Los pro¬ 
gramas destacados son: 


IMPRESORAS 


— Suma y Resta 

— Cómo elegir una carrera pro¬ 
fesional 

— Sistema Autor ATARI 

— Principio de Masa 

— El Alfabeto MAX 

— Fracciones. 


La configuración ATARI que 
incluye una impresora de cali¬ 
dad gráfica permite adquirir 
alta tecnología de impresión 
con la ayuda de programas co¬ 
mo los destacados: 


— Print Shop Companion 

— Companion 

— Newsroom 

— Tom Generator 

— Colección XLENT 

— Shematic Designer. 
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PROGRAMAS: continuación 




UTILITARIOS 

PROFESIONAL-HOGAR 

Los 3 programas más solicitados 
han sido: 

— ATARI Writer 

— Base de Datos 

— Planilla Electrónica 

Siguen en orden de preferen¬ 
cias los siguientes; 

— Synfile 

— Syncalc 

— Syngraph 

— Synstat. 




pkrtk pm timksaver 


UTILITARIOS 
DE PROGRAMACION 

Los programadores u otros inte¬ 
resados requieren también cier¬ 
tos programas para usos especi'- 
ficos, como los siguientes: 

— Scananalyser 

— Técnicas de Protección 

— Wizard 5 

— Copiadores • 

— Tesoro de Peter 

— Vaciador de Pantalla 

— Utilitarios 1029. 



HARDWARE 

MUNDOATARI ha incursionado 
en este campo, promoviendo los 
siguientes artículos; 

— Lápiz de Luz 

- Red MUNDOATARI para co¬ 
nectar simultáneamente 8 
computadores. 
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AUTÜRUN 


En esta ocasión estamos creando un programa 
de AUTORUN para usar en sus diskettes. Es 
una forma de facilitar su operación diaria. 


Digíte cuidadosamente el siguiente listado 
y sálvelo en diskette antes de ejecutar: 


S« I=»:L=«:HAK=196 

66 frIH A$(HftK),6$(NAK),R$a) 

7# OPEH ttl,4,e/‘E:'*:0PCN ltt,4,e,"K:“ 

86 ? "Este prograna pernite crear •• 
98 ? " un archivo AÜTOliUH.SVS 

•I 

m ? " que inicializa el diskete 
18 

118 ? " según las instrucciones 

«I 

128 ? " g conandos que usted" 

1 J 8 ? “ necesite" 

148 1=1+1 

158 ? J? “INGRESE COH8NOO 
81 

188 ? ;INPÜT 


► 


#V, 
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D/SKBTTE: continuación 


17 % POKE 766,1:? :? **CoiMan4 
;P0KE 766,6 

186 ? :? **E5 CORRECTO CS/HT? '*;:fiE 
T tt2.H:? :R$=CHR$(K) 

196 IF R$=“S‘* 6R R$=“S" TNEN 226 

266 IF R$=“N** 6R R$=*'n'‘ THEN 156 

216 60TO 176 

226 X=LHEH(A$)n’HAX 

216 IF K <=6 THEN 266 

246 ? :? **coMMfido is “jK;** ctr 

actFr(«s)'‘ 

256 ? '‘«xccoso 1=1-1$SOTO 270 

266 6$ (L4>1) =6$: L=IEN (6$) i 6$ (L^l) =CHR$ ( 

155):L=Ln 

276 ? :? "Comandos 

286 POKE 766,1:? :? 8$:P0KE 766,6 

296 IF L>=H6X'l THEN ? "COWLETO LA OP 

CION ":? :6eT0 176 

366 ? "PUE6E A6RECAR C0HAN665 ";MAK-L- 

1;" moro" 

316 ? " CARACTERES 

326 ? :? "Has ComanOos (S/H)? "::6ET 
in,X:R$=CHR$(X) 

336 IF R$="S" OR R$="S" THEN 146 
346 IF R$="N" OR R$="n" THEN 366 
356 COTO 366 
366 ? CHR$(125)i 

376 ? "Insorto Aishotto ouo oscribo " 
386 ? " 01 archivo AUTORUNISVS " 

396 ? " pulso RETURN. "::GET tl2,X:CL0 
SE ttÜCLOSE H2 

466 ? CHR$(12S)::? " Escribiendo archi 
VO AUTORUN.SYS" 

410 OPEH Itl,8,6,"A:AUTORUN.SYS" 

426 REH 

436 AATA 255,25^6,6,59,6 

446 AATA 173,31,268,41,4,246,16,169,18 

.141,33,3 

456 AATA 169,6,141,34,3,96,251,243,51, 
246,33,6 

466 AATA 163,246,51,246,66,246.76,220, 
243,6,238,33 

476 AATA 6,172,33,6,192,6,268,16,169,6 
,141.33 

486 AATA 3,169,228,141,34,3,185,59,6,1 
66,1,96 

496 FOR 1=1 TO 66:REAA X 
566 IF 1=5 OR 1=48 THEN X=XtL 
516 PUT tll,X:HEKT I 
536 FOR 1=1 TO L 
546 X=ASC(B$(I,I)) 

550 PUT t»i,H:NEXT I 


576 AATA 226,2,227,2,6,6,224,2,225,2,1 
7,6 

586 FOR 1=1 TO 12;REAA X 

596 PUT ttl,X:NEXT I 

666 CLOSE Hl:? CHR$C125)i:ENA 


Ejecútelo con la instrucción RUN. En pan¬ 
talla aparecerá el siguiente mensaje: 



Usted necesitará un AUTORUN que ejecute 
las siguientes tareas: 

— Iniciar en modo 0. 

— Editar en pantalla el texto ''MUNDOATARI” 
en la posición 10,10. 

— Esperar desarrollo de una pausa. 

— Ejecutar el programa MENU. 


Para lo anterior digite en modo directo la 
siguiente línea: 

GRAPHICS 0: POSITION 10,10: PRINT "MUNDO 
ATARI": FOR TIME = 1 TO 2000: NEXT TIME: 
RUN "D: MENU" 

como indica la foto a continuación: 


VO oüTonuu.svs 

oút fMClalIZO OI OltkOtO 

«••un los inotruccion*s s 
u con4n«o« ustoO 

n«c«sit* 

xacPESC COMAHOO nx. 

Cft. OtPOS. XO.XO:^" HUMC>0 OTAR! ":FOR 
Tire: 1 TO 206d:MEKT 1 irC : RUM"t>: MENU" 
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DISKETTE: continuación 


Presione RETURN y aparecerá el mensaje: 



crear 

yfl 

. ... 

- t ^ - • • ' ' * 

; - r t ■: 

■ V _ - •> 





•• J* 


Existe la posibilidad de agregar más comandos 
como indica la próxima foto: 



llSwn Icfinvtrucclonvs 
y 9ue ultyd 

ntcetit« 


lN6fte>e COMANDO 


ttl. 


Cft. •{P05. 10,10:'* ’ MUNDO OTAR! ":F0« 
TXf<: 1 TO lOOOrHENT TXHT : RUN-’D : MENU ■ 


coNn«no »:(;&. 0:r'0S. 

AftX ''irOR TIME' 1 TO 
N"D:MÍNU’' 


1» .10;MUNDO A 
í t'• «I- XT TIME :RLÍ 


E) CORRECTO 
Cenan4os 


CS' H> 


«R. 0:P0S. 10.lO:-»’’ MUNDO ATARI ••:FOR 
TIMES 1 TO 2000:HeXT TXTC :PUN"D:HCNU" 


^cSracTEReI*** COMANDOS 11» r*or* 


Jfl _<S£H>?. 


Luego pide insertar el disco donde se encuen¬ 
tra el archivo AUJORUN.SYS. Al presionar ia 
tecia RETURN se crea ei archivo. 

NOTA: el diskette en que se crea AUTORUN. 
SYS debe estar formateado y contener el DOS. 

Apague y vuelva a encender su ATARI y po¬ 
drá comprobar como se cumplen las etapas descri¬ 
tas anteriormente: 



Pruebe y apiique esta nueva herramienta a su 
alcance. 


CARGADOR 

BINARIO 


Si tiene usted una serie de programas de jue¬ 
gos que desea agrupar en un diskette su opción 
es cargario por medio del menú DOS, letra L. 

Este práctico utilitario permite cargar los ar¬ 
chivos que se encuentran presentes en el Direc¬ 
torio al inicializar el disco, pues contiene el pro¬ 
grama AUTORUN.SYS. 

Dígite el siguiente listado: 


169 OPEN tu,6,01'*6:AUTORUM.SVS" 

180 PIN A(19):TftAP 278 

198 POR Nzieee to i88e 9 tep le 

288 ? "REA8IN6 LINE'*;N:FOR J=1 TO 18 
218 REAO K:ú(J)=X:TOT:TOTPX 
228 NEXT J 

238 REAO X:1F XOTOT THEN 278 
248 FOR J=1 TO 18:PUT ttl.A(J) :NEXT J 
258 NEXT N 
268 EN8 

278 ? "ERROR EN LINEA ";N:EN8 

1888 PATA 255,255,124,29,255,29,32,224 

,38.32,1265 

1818 OATA 37,31,32,224,29,32,193,38,48 
.6,1927 

1828 OATA 32,85,31,76,133,29,32,187,31 
,32,2595 


► 
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DfSKETTE: continuación 


Í9S» PATA 182,30,32,177.38,32,148,32,3 
2,246,3536 

1040 PATA 31,32,115,32.32,177,30,32,61 
.32,4110 

1050 PATA 32,21,30,32,78,30,32,213,29, 
32,4639 

1068 PATA 147,30.32,125.30,32,78,30,32 
.136,5311 

1070 PATA 30,32,98,38,32,165,30,48,9,3 
2,5817 

1080 PATA 203,29,76,171,29,108,226,2.3 
2,182,6875 

1890 PATA 30,108,224,2,96,169,212.141. 
226,2,8085 

1100 PATA 169,29,141,227.2,96,162,32,1 
69,3,9115 

1110 PATA 157,66,3,169,6,157,74,3,169, 
250,10169 

1120 PATA 157,68,3,169,29,157.69,3,32, 
86,10942 

1130 PATA 228,96,68,49,58,42,46,42.18. 
30.11619 

1140 PATA 158.32,155,0,0,162,32,169,3, 
157,12487 

1150 PATA 66,3.169,0,157,68.3,169,30,1 
57,13309 

1160 PATA 69,3,169,4,157,74,3,32.86.22 
8.14134 

1170 PATA 96.162.32,169,7,157.66,3,165 
.192.15183 

1180 PATA 157,68,3.165.193,157,69,3,16 
5,198,16361 

1190 PATA 157,72,3,165,199,157,73.3,32 
.86,17308 

1200 PATA 228,96.169,19,133,192.169,30 
,133,193,18670 

1218 PATA 169,2,133,198,169,0,133,199, 
32,47,19752 

1220 PATA 30,96,165,196,56,229,194,133 
,198,165,21214 

1230 PATA 197,229,195,133,199,24,165,1 
98,105,1,22660 

1240 PATA 133,198,165.199,105,0,133,19 
9,96.173,24061 

1250 PATA 19,30,133,194,173,20,30,133, 
195,96,25084 

1260 PATA 173,19,30,133,196,173,20,30, 
133,197,26188 

1270 PATA 96,174,19,30.232.240,1,96,17 
4,20,27270 

1280 PATA 30,232,240,1,96,32,78,30,96, 
165,28278 



1290 PATA 194,133.192,165,195,133,193, 
32.47,30,29584 

1300 PATO 96.162.48,76,184,30.162,32,1 
69,12,30555 

1310 PATA 157,66,3.32.86,228,96,162,32 
,169,31586 

1320 PATA 5,157,66,3,169,0,157,68.3.16 
9,32383 

1338 PATA 30,157.69,3,169,18,157,72,3, 
169.33230 

1340 PATA 6,157,73.3,32,86,228,96,162. 
48,34115 

1350 PATA 169.3,15?,66,3,169,4,157,68, 
3.34914 

1360 PATA 169.31.157,69,3,169,8,157.74 
,3,35754 

1378 PATA 169,8,157.75,3,32.86,228.169 
.1,36674 

1388 PATA 141,240,2,96,69,58,162,48,16 
9,11,37678 

1390 PATA 157.66.3.165,194,157,68,3,16 
5,195,38843 

1488 PATA 157,69.3,165,198,157,72,3.16 
5,199,46031 

1410 PATA 157,73,3,32,86,228,96,169,1, 
133,41809 

1420 PATA 84,169,10,133,85,169,67.133, 
194.169,42222 

1430 PATA 31.133.195,169,16.133,198,16 
9,0,133,43399 
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DISKETTE: continuación 



1440 DATA 199.32,6.31.236.8^,90,66,105 
.110,44358 

1450 DATA 97.114,121,32,76.111,97,100, 
32,77,45215 

1460 DATA 101,110,117,65.0,32,153,31,3 
2,177,46033 

1470 DATA 31.169,0,133,194,169,30.133, 
195,169,47256 

1460 DATA 10,133,196,169,0,133,199,230 
,84,160,46572 

1490 DATA 6,173,83,31,201,76,144,12,16 
0,24,49484 

1500 DATA 165,84,201,16,208,4,169,3,13 
3.84,50551 

1510 DATA 132.85,173,83,31,141.0,30,16 
9,45,51440 

1520 DATA 141,1,30,32,18,32,32,6,31,23 
6,52001 

1530 DATA 83,31,96,173,10,30,281,83,20 
8.16,52932 

1540 DATA 173,11,30,281,89,208,9,173,1 
2,30,53868 

1550 DATA 201.83,208,2,104,104,96,173, 
1,30,54870 

1568 DATA 201.32,248,2,104,104,96,169, 
20,133,55971 

1570 DATA 84,169,4,133.85,169,215,133, 
194,169,57326 

1580 DATA 31,133,195,169,31,133,198,16 
9,0,133,58518 


1598 DATA 199,32,6,31,96,86,114,101,11 
5,115,59407 

1600 DATA 32,116,104,101.32,76,101,116 
.116,101,60302 

1610 DATA 114,32,111,102,32,89,111,117 
,114,32,61156 

1620 DATA 67,104,111,105,99,101,162,48 
.169,3,62125 

1630 DA1A 157.66,3,169,16,157,60,3,169 
,32,62965 

1640 DATA 157,69,3,169,4,157,74,3,32,8 
6,63719 

1650 DATA 228.96,75,58,160,0,174,04.31 
,177,64602 

1660 DATA 194,9.128.157,159,32,232.206 
.200,177,66290 

1670 DATA 194,157,159,32,201,32.240,11 
,232,200,67748 

1680 DATA 192,10,144,241,169,32,157,15 
9,32,142,69626 

1696 DATA 64,31,238,64,31,96,6,162,0,1 
89,69941 

1700 DATA 159.32,232,265,60,32,208,247 
,169,68.71353 

1710 DATA 141,6,30,169,56,141,1,30.166 
,0,72683 

1720 DATA 189,159,32,153,2,30,232,266, 
261,32,73313 

1730 DATA 208.244,136.169,46,153,2,36, 
266,169,74676 

1740 DATA 42,153,2,38,200,169,32.153,2 
.30,75483 

1750 DATA 96,162,48,169,7.157,66,3,169 
,0,76368 

1760 DATA 157,72,3,157,73,3,32,86,228. 
281,77372 

1770 DATA 65,144,234,205,83,31,176,229 
.9,128,78676 

1780 DATA 141,60,32,96,189,212.141,224 
,2,169,79922 

1790 DATA 29,141,225,2,96,226,2,227,2, 
124,80996 

1800 DATA 29,0,6,0,0,0,0,0,0,0,81025 


Ejecútelo a continuación, con lo que produ¬ 
cirá en el diskette un cargador binario, en el ar¬ 
chivo AUTORUN.SYS. 

Agregue a este diskette los archivos de juegos 
que prefiera, 

Debe agregar el DOS. 

Envíe sus comentarios o consultas sobre este 
utilitario a nuestra casilla 458-11. 
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DfSKETTE: continuación 



El próximo tema se dirige a usuarios de ia Unidad 
de Disco (drive), cuya velocidad les impresiona, 
pero también a aquellos antiguos programadores, 
que desean por el contrario, aumentar ia velocidad 
de operación. 


La clase de hoy se titula: El CIO (Central In- 
put Output). Consiste en una rutina en lenguaje 
de máquina del Sistema Operativo ATARI que 
se puede accesar mediante el ATAR! BASIC. 

La rutina transfiere datos a alta velocidad des¬ 
de el periférico usado (disketteo casete). Las dife¬ 
rencias se ponen de manifiesto con el listado si¬ 
guiente: 


7 REH = AHALIZANPO INCREMENTO 


8 REH = PE LA VELOCIPAP ACCESO 

= 

9 REH = PISKETTE CON CIO 

= 



15 ? CHR$(125) 

100 GOTO 190 

116 REH SUBRUTINA PE CONTROL PE 

TIEMPO 

120 0LPTIME=TIME:0PP=0PP«1 

130 TIHE=PEEK(20)♦256»(PEEK(19)♦256*PE 

EK(10)) 

_ 


14« TIIC=INT(l«S»«TlME/6i)/lMt 
150 EL005E=INTCTIHE-OL&TIME) 

160 ? “TIEMPO = "{TIME, 

170 ir OP»=2«IHTCO0»/2) THEH ? “ PIFE 

ftENCIA = “CELARSE 

175 ? :RETURN 

180 RCM initUlizacion 

190 TIMER=120 

200 PIH FILESC141:FILE$:“PíTESTPATA“ 

210 REN VERIFICA ARCHIVO 

220 TRAP 2S0iAUK=0 

230 OREN »1,6,0,“P:«.«‘* 

240 COTO 260 
250 FILE$="C"!AUX=120 
260 TRAP 34567:CL0SE ttl 
270 REH PEFIHE AREA PE TRABAJO 
300 APPRE5S=PEEK (144) *256«PEEIC (145) «^25 
6 

310 REH PRUEBA CON 1000 BVTES 

320 NUMBER=1000 

370 OPEH Hl,0,0,FILES 

300 PONE 84,4:? “ [3!DEi^i^S“ 

390 COSUB TINER 

400 FOR 1=1 TO NUHBER 

410 RUT Hi,PEEK(APPRES5^I-‘l} 

420 NEXT I:GLOSE ttl 
430 COSUB TIMER 

440 OREN Hl,4,0,FILES_ 

450 PONE 04,0:? ♦ TiláMSJifjgn » 

460 COSUB TIHER 

470 FOR 1=1 TO NUHBER 

480 CET H1,A:P0KE APPRESS«I-1,A 

490 NEXT ÜCLOSE H1 

500 COSUB TIHER 

510 I0=1:0PEN MIO, 0,AUX,FI LES 

520 POKE 04,12:? ■ Íi!WiMfc lI»l»» 

530 COSUB TIHER 
540 COSUB 6000 
550 COSUB TIHER:? 

560 10=l:0PEN HI0, 4,AUH,FIL ES 

570 POKE 84,16:? ■ liUMM MlW 

500 COSUB TIHER 

590 COSUB 7006 

600 COSUB TIHER 

610 ÉNP _ 

6010 10=16*10 

6020 IOCB=032tIO:POKE I0CB4^2,11 
6030 APRHI=INT(APPRESS/256) 

6040 APRL0=APPRESS-APRHI«256 ^ 

6650 POKE I0CB+4,APRL0:P0KE I0CBt5,APR 
HI 
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DtSKETTE: continuación 


MUNHI=IHT(HtfHftEft/256) 

6070 NUHL0=NUMDEft-256»NUHHI 

6080 POKE IOCB4'6,MUNLO:POKE I0CB+9,HUH 

HI 

6090 I=U5R(A0ft("hhha.VQ"),ID) 

6100 CIOSE «10716 
6110 RETURN 


ICIO GET BYTE5I 


7010 10=16*10:TRAP 7100 
7020 1060=832^0¡POKE IOCB+2,7 
7030 A0RHZ=lNT(A00RES5/256} 

7040 AMLO=AOORE55*AORHI*256 

7050 POKE IDCB«4,A0RL0:P0KE I0CB4^5,A0R 

HI 

7060 HUHHI=INT(HUNBER/2S6) 

7070 NUHL0=NUHBER>2S6*IIUHH1 

7080 POKE I0CB«^8,NUm.0:P0KE 1000^9.NUH 

HI 

7090 I=USR(A0R("hhh|2LVCI“),I0) 

7100 CL05E «10716 
7110 RETURH 


Digite y ejecute el programa anterior. En pan¬ 
talla aparece 


TICMPO T 95.Z»« 

OXrEREMCXA z 2« 

TIEMPO : 114.787 

( IFfRCKi. 16 z le 

IiT?*0 ijj tfct. 

TlfHf;- ■ i;; 3$% 


TICnPO ; 1Tb.2 66 

t'lFCRCNl.XO Z 1 

|eAov 



Usted puede apreciar los diferentes tiempos 
de demora de una transferencia de datos vía 
BASIC y utilizando el CIO. 



Análisis de líneas del programa: 

110-175 Rutina del contador de tiempo. 

180-200 Inicialización. 

210-260 Verifica el drive y define el byte auxiliar. 
270-300 Ubica el inicio de la memoria libre. 
310-320 Define el número de bytes de traspaso. 
370-430 BASIC PUT 1.000 bytes al diskette. 
440-500 BASIC GET 1.000 bytes desde el dis- 
kstt0 

510-550 PUT con CIO para 1,000 bytes. 

560-600 GET con CIO para 1.000 bytes. 
6000-6110 CIO PUT (rutina). 

7000-7110 CIO GET (rutina). 

APLICACIONES POSIBLES: 

Todas aquellas en que se requiere una transfe¬ 
rencia voluminosa de bytes desde o hacia el peri¬ 
férico en uso: 

— Salvar pantallas gráficas, 

— Manejar archivos de datos, 

— Etc. 

Hasta el próximo mes, amigos. 


BONO 

MUNDQATARI 

30000 REH UTILITARIO BONO NUNBOATARl 
17 

30009 MH A$CS):? CHR$(i25) 

30018 ? "NUHERO INICIAL BE LA LINEA V' 
¡IHPUT N 

30015 ? “INCREMENTO BE LINEA ?":INP 
UT INC 

30020 ? CHR$(125):? " TTPO BE LI 

NEA“ 

30030 ? “ N= N0RHAL“ 

30031 ? “ B= BATA" 

30832 ? " R= REM" 

30033 INPUT A$:? CHR$(125} 

38034 IF A$=“N“ THEN 60T0 30040 

30035 IF A$=“B“ THEN SOTO 30058 

30036 GOTO 30060 

30040 FOR 1=1 TO 15:? N*1*INC-2*IHC:NE 
KT liGOTO 30080 

30050 FOR 1=1 10 10:? N^I*INC-2«INC;“ 

BATA“:NEKT I:G0T0 30080 

30060 FOR 1=1 T0,7!? N+I*INC-2*INC;“ R 

EH“:NEHT ÜGOTO 30080 

30080 POKE 84,0:5T0P 
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CASSETTE 



Controlando 
la casetera 


Lé facilidad de contar con un AUTORUN, o inicio 
automático de programas, es posible también para 
los usuarios de casetera. En este artículo se pro¬ 
porciona un listado para aplicar esta venta/a en 
sus casetes. 


El programa AUTOCAS pone una corta rutina 
al comienzo de un casete, lo que hará que su pro¬ 
grama BASIC grabado a continuación se cargue 
automáticamente al encender su computador. 

COMO USAR EL AUTORUN 

1. Digite el listado adjunto. Grábelo como pre¬ 
caución antes de ejecutar. 

2. Ejecute con la instrucción RUN. Si el progra¬ 
ma no tiene errores de DATA tocará 1 beep 
y aparecerá un mensaje parp)adeante: 

STARTGRABA 
AUTORUN A CASETE 

3. Ponga un casete virgen en la casetera y presio¬ 
ne las teclas RECORD y PLAY. 

4. Presione la teda START. El programa AUTO- 
CAS pondrá entonces la rutina mencionada al 
comienzo de ese casete. 

5. A continuación aparece otro mensaje por el 
lapso de un minuto aproximadamente: 

CARGUE SU PROGRAMA BASIC 
GRABELO CON CSAVE 

Grabe a continuación su programa favorito 
con la instrucción CSAVE. 

Y eso es todo. Si usted desea repetir la opera¬ 
ción con otras cintas no necesita grabar nueva¬ 
mente el programa AUTOCAS, ya que su parte 
esencial se encuentra a salvo en la página seis. 
Cargue otro programa favorito y digite: 

X~USR(1536) 

con lo que el computador tocará 1 beep, recordán¬ 
dole que debe repetir los pasos 3 al 5. En esta oca¬ 
sión no aparecerán los mensajes anteriores, pues 
todo el BASIC del programa AUTOCAS ha sido 
borrado. 


üUTOCftS MUN&OúTóRI 


IM REN_ 

llt GRAPHICS 18:P0KE 53774,64:P0KE 16, 

64 

126 P651T10N 2,1:? lt6;"AUT0CAS ATARI" 
176 POSmOH 2,9:? 

66SH6 316 

166 P6SITI0N 6,9:? It6;*'stapt mE 


196 P6SITI0N 6,16:? US!' ffilIBmnTMMgiaa 

fB” 

266 POKE 711,16«INT(16liAND(6n^7?IHTCS 
«RR6C6)) ' 


216 P6KE 769,16«INT(16«RH»(6)}t7fINT(5 
«ARA(6)} 

226 IF PEER (53279) 06 THEH 266 
236 POXE 764,12:X=USR(1536) 


246 GRAPHICS 17:? «6:? lt6;"CAR6UE‘«:? tt 
6;**SU PROGRAHA 6ASIC“ 

256 ? tt6:? I»:? ll6!' lWJ»1Jaii7 «i? |»6;'fi 
60 csAve" 


266 F6R T=1 TO 266 

276 POKE 711,16RIHT(16«(RH6(6))?7tIHT(5 
«RH6(6)) 

266 POKE 769,16»IKT(16«RH6(6))«7?IRT(5 
«RII6C6)):HEXT T 

296 GRAPHICS 6:P0RE i6,192:P0KE 53774, 
247:POKE 764,12:EH0 
316 OATA 164,162,46,169,3,157,66,3 
326 OATA 169,75,157,66,3,169,6,157 
336 OATA 69,3,169,8,157,74,3,169 
346 OATA 126,157,75,3,32,86,226,169 
356 OATA 11,157,66,3,169,128,157,68 
366 OATA 3,169,6,157,69,3,169,6 
376 OATA 157,72,3,173,129,6,157,73 
366 OATA 3,94,73,3,126,72,3,32 
396 OATA 86,228,169,12,157,66,3,32 
466 OATA 86,228,96,67,58,155,6,6 
416 OATA 6,6,6,6,6,6,6,6 
426 OATA 6,6,6,6,6,6,6,6 
436 OATA 6,6,6,6,6,6,6,6 
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449 

RATA 

9.9,9,9,9,9,9,9 

459 

RATA 

9,9, 8 , 9 , 9 , 9,9,9 

469 

RATA 

9,9,9,9,9, 9 , 9 , 9 

479 

RATA 

0,1,128,6,141,6,169,69 

489 

RATA 

141,2,211,24,96,174,64,3 

499 

RATA 

189,27,3,133,212,141,213,6 

599 

RATA 

189,28,3,133,213,141,218,6 

519 

RATA 

169,15,177,212,153,112,6,136 

529 

RATA 

16,248,169,199,141,116,6,169 

539 

RATA 

6,141,117,6,169,112,157,27 

549 

RATA 

3,169,6,157,28,3,234,162 

559 

RATA 

255,232,142,192,6,189,234,6 

569 

RATA 

16,39,72,169,32,224,9,144 

579 

RATA 

19,174,64,3,169,9,157,27 

589 

RATA 

3,169,9,157,28,3,169,9 

599 

RATA 

133,9,169,255,141,252,2,194 

698 

RATA 

169,1,96,67,76,79,65,68 

619 

RATA 

155,82,85,78,155,9,8,9 

629 

RATA 

9,9,0,9,9,9,9,9 

639 

n.START=lS36 


S4t »t.EN»=1791 

659 RESTORE :SUM=9 

669 F9R X=HLST*RT T9 MLENO 

679 REA9 Y:SUM=5UIHV 

689 P9KE X,V:NEXT X 

699 IF S0NO19959 THEK CR9PHICS 9!? » 

RROR »E 99T9";CltR$C2S»tEND 

799 RETHRX 


Para disfrutar las bondades del AUTORUN 
debe poner )d cinta grabada anteriormente y pre¬ 
sionar ta tecla PLAY. Luego encienda el computa¬ 
dor manteniendo presionada la tecla START. AI 
tocar 1 beep toque cualquier tecla para poner la 
casetera en movimiento. 

El computador carga primero el AUTORUN 
Y éste a su vez toca 1 beep y procede a cargar por 
si mismo el segundo programa. 

¿Qué tal. amigos? Este es otro servicio de 
su computador ATARI para sus usuarios. 

Hasta el próximo mes. 


USR 


La rutina de este mes complementa el trabajo de 
programación para tos drives, proporcionando 
una rutina de carga de archivos de alta velocidad. 


La rutina se llama FAST$ y sus códigos se 
localizan entre las líneas 30000 y 30002. 

Digite el siguiente listado y sálvelo en un dis- 
kette: 

Comentarios adicionales: 

ADR(FAST$) corresponde a la localización ini¬ 
cial en memoria de la rutina ML. 

ADR{ESP$) corresponde a la localización ini¬ 
cial del string. 

110 En esta línea se encuentra el llamado de la 
función. 

6000 Cantidad de bytes de traspaso. 


19 91H FAST$U9).ESP$(6999>,F$(15) 

15 ESP$a>='' '■:E5P$(6999)=“ ‘•5E5P$C2) = 
E5P$:Z=9:60TO 39969 

29 ? "6“:P0KE 84,19:? “XOMBRE ftE ARCHl 
VO « LEER:" 

39 ? " EL FORHATO ES PtXKMKX.XX" 

49 IXPUT F$ 

199 OREN ttl,4,9,F$ 

119 y=ÜSR(A9R(FAST$J,1,A9R(ESP$),6999) 
115 Z=PEEKU9)t256«PEEKC41) 

129 ESP$(Z)=ESP$(Z,Z) 

125 I F V=136 TXEN ? ESP$:? '«SDEaCQ 

139 IF Y=1 THEN ? ESP$;? "ERROR:6OT0 1 
19" 

149 ? "SaiEQ n “;V:EN9 
39999 RESTORE 39991:F0R 1=1 TO 39:REA9 
A:FAST$(LEKfFAST$)n>=CHR$(A) iXEXT I: 
60T0 29 

39991 RATA 194.194,194,19,19^19.19,179 
.169,7.157,66,3.194,157,69,3,194.157,6 
8,3.194,157,73.3 

39992 RATA 194,157.72,3,32,86,226,132. 
212.169.9.132,213,96 


Una aplicación interesante consiste en que 
esta rutina permite cargar archivos de datos en 
string en número superior a Í28 bytes. • 
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Directo al 6502 


Este mes continuaremos manejando el EDITOR 
de ASSEMBLER para aprender en forma práctica 
la operación del microprocesador 6502. 


REGISTROS X e Y 

Estos registros son auxiliares del acumulador 
para efectuar principalmente funciones indexadas. 

El significado de dicha función lo veremos 
claramente en los dos ejemplos siguientes; 

Ejercicio 1: 

Copiar los valores de la tabla 1 en las localiza* 
cíones correspondientes de la tabla 2. 

Encienda su computador cargando el ASSEM¬ 
BLER y a continuación digite el siguiente listado; 


it «=$6ie 
2t LDX US 
31 COPY LPA TABLEl.X 


48 

STA 

TABLE2,X 

58 

DEX 


68 

BPL 

COPY 

78 

BRK 



88 TABLEi .BYTE 18,20,38,48,50,68 
98 TABLE2 «:*+6 
8188 .END 


Digite a continuación la instrucción para crear 
el programa objeto. Recuerde que necesita digitar 
para ello la palabra; asm 
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ASSEMBLER 


En su pantalla podrá ver la siguiente figura: 


0000 


10 

M 

9400 

0600 

A209 

20 

LDX 

19 

0402 

AOOO 

30 

LOY 

10 

0404 

6D0FO4 40 COPy 

LOA 

TABLEl.X 

0407 

990F04 90 

8TA 

TABLEl.Y 

040A 

C8 

40 

m 


040D 

CA 

70 

DEX 


040C 

10F4 

60 

BPL 

COPY 

040E 

00 

90 

BAK 


040F 

OA 

0100 TA6LE1 .BYTE 10,20,30,40,90.40 

0410 

14 




0411 

lE 




0412 

26 




0613 

32 




0414 

3C 




0419 


0110 TABLE2 1* 

1+4 

0410 


0120 

.END 



$600 


$60C 


é612 


Programa 

objeto 

TABLEl 






TABLE2 







Explicación del programa digitado: 

10 El programa se aloja en la página 6 ($ 600 co¬ 
rresponde ai decimal 1536). 

20 Carga en el registro X el número 5. 

30 Carga en el acumulador ei primer contenido 
de la tabla 1, al cual se le suma el valor presen¬ 
te en el registro X. En este caso el primer va¬ 
lor transferido será el 60. 

40 Transfiere el valor mencionado a la tabla 2 
más el mismo valor del registro X que no se 
ha modificado. 

50 Decrece en 1 el valor de X. Ahora queda con 
el valor 4, 

60 Decisión Branch on PLus. Mientras ei registro 
X tenga un valor igual o superior a 0 saltará 
el programa al labe! COPY (línea 30). 

70 Interrupción del programa por conclusión de 
la tarea asignada. Este paso ocurre cuando X 
es menor menor 

es menor que 0. 

80 Localización de la tabla 1 a partir de $ 60C 
(1548 decimal), en el mismo orden en que 
aparece después de .BYTE. 

90 La tabla 2 se ubica a continuación de la pri¬ 
mera, esto es. a partir de $ 612 (1554 deci¬ 
mal). La definición de este orden está dada 
por el comando: 

* = • +6 

que asigna 6 espacios de memoria desde el 
final del programa anterior. 

En el esquema siguiente podemos ver los dis¬ 
tintos pasos efectuados por el programa. 


Ejecute el programa con las instrucciones ya 
aprendidas en números anteriores: 

BUG Y a continuación G600 

Para comprobar la rarrecta ejecución del 
ejercicio digite la instrucción; 

0612 

Vea que los valores señalados corresponden 
exactamente a los de la Tabla 1. 


Ejercicio 2: 

Copiar ios valores de ia Tabla 1 a la Tabla 2 
en sentido inverso. 

Para resolver este problema recurriremos al 
registro Y. 

Digite el listado siguiente: 


it K=$60« 

2t L0X OS 

19 L»V M 

46 CtPY LM TABLCljX 
Si STA TABLE1,V 
99 INV 
7t KX 
99 BPL COPY 
90 BItK 

0100 TABLEl .BYTE Í0«20,30,40,50,B0 
0110 T0BLE2 
0120 .EKB 
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ASSEMBLER: continuación 



A continuación digite la instrucción ASM 
para crear el programa objeto con las localiza¬ 
ciones definitivas. En pantalla verá la siguiente 
imagen; 


0000 

10 

«600 

0600 A205 

20 

LDX 15 

0602 BD0C06 30 COPY 

LOA TABLEl.X 

0609 9D1206 40 

8TA TABLE2.X 

0606 CA 

50 

DEX 

0609 i0F7 

60 

BPL COPY 

0606 00 

70 

6PK 

060C OA 

80 TABLEl 

.BYTE 10,20,30.40,50.60 

060D 14 



060E lE 



060F 28 



0610 32 



0611 3C 



0612 

90 TABLE2 

«- t«6 

0618 

0100 

.END 


Comentario de líneas: 

20 Carga en el registro X el número 5. Al igual 
que en el ejemplo anterior el primer valor 
Indicado en la TABLA 1 será el último (60). 

30 Carga en el registro Y el número 0, Este re¬ 
gistro será utilizado para indicar las modifi¬ 
caciones de lugar en la TABLA 2. 

A diferencia del registro X el registro Y 
señala el primer byte de la TABLA 2. 

40-80 Ejecuta la transferencia de bytes. 

La diferencia con el ejemplo anterior con¬ 


siste en que el registro Y se incrementa en 
1 a la vez que el registro X decrece en cada 
vuelta. Los valores contenidos en los respec¬ 
tivos registros en las distintas etapas del 
ciclo son los siguientes: 


Vu«lta 

TABLA 1 

TABLA 2 

número 

IX) 

(Y) 

1 

5 

0 

2 

4 

1 

3 

3 

2 

4 

2 

3 

5 

1 

4 

6 

0 

5 


Como usted puede apreciar en el cuadro 
el sexto byte de la TABLA 1 es transferido 
al primer byte de la TABLA 2, etc. 

80 Decisión branch que mantiene las mismas 
características del ejemplo anterior, pues la 
referencia está dada por el valor actual del 
registro X. 

Compruebe el resultado de la operación di- 
gitando; 

BUG y luego d615 

Para aquellos lectores que necesitan buscar la 
equivalencia en BASIC para comprender mejor el 
planteamiento de ASSEMBLER presentamos un 
listado que ejecuta la "transferencia inversa de 
valores de una tabla"; 


le DIH TABLEl(5},TftBLE2C5) 

15 TABLEl(B)=16:TABLElCl)=26:TABLEl(2) 
=36:TABLEl(3)=46 1 TABLElC4)=56:TABLEl(5 
)=66 
26 K=5 
36 V=6 

46 A=TABLE1(X) 

56 TA6LE2tY)=A 
66 V=Y*1 
76 K=H-1 

66 IF X>=6 THEN 46 
96 EKB 


Obsen/e que el BASIC necesita dimensionar 
e inicializar el arreglo de la TABLA 1. 

Los ejercios de hoy le han proporcionado 
una visión clara de como funciona la indexación. 
Trate de aplicar los conocimientos adquiridos en 
la solución de variaciones personales. 

Hasta el próximo número, amigos. 
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TIPIANDO 



Combatiendo 


COMBATIENDO es un juego de acción, en 
el que usted simula ser piloto de un avión ciue 
opera sobre baterías antiaéreas. 

El propósito es rescatar 4 personas al tocar¬ 
las con- el aeroplano. Una vez superada esta tarea 
puede pasar a la próxima etapa. 

El bombardeo se efectúa con el botón rojo 
del joystick. 

Diviértase con este nuevo juego de su revista 
amiga MUNDOATARI, 


o A & — 7 K 

MX.MCEI- —X 
Re.'&cueo — O 

COMBATIENDO 


30 OIH 8$(29e).E$(S).0C$(3;:Y=5 
40 605UB 5S0:&O5UB ie30:6OSUB 1890:005 
UB il8e:5H=3 

50 G5=l:EL=e:FU=S00:5=l:V=S:L=8:GOSUB 
810 

60 J=5TICK(0} :IF J<>7 ANO jOll THEN 8 
0 

70 bD=(J:7)-(J=ll) 

60 IF J013 AH0 J014 THEN R=PEEK(5Rn 
0+60+(20»Y});IF R<>0 AND R<>232 THEN 1 
150 

90 IF J013 AN8 J<>14 THEN l>¥=0:0OTO 1 
10 

100 PONE 5R+10+{20»Y) ,0:l>Y=(J=13>-(J=i 
4);R=PEEK(5R+i0+(20H(Y+Oy))):IF R<>0 A 
H6 R0232 OR W8Y=13 THEN USB 
110 IF R=232 THEN 520 
120 FU=FU-l:P05ITI0H 5,15:?'»65"GA5 
jFUí” ":IF FU=0 THEN 408 
130 Y=Y+0YíPOKE 5Rn0+20»Y, 172-66:IF 5 
TRIG(0)<>0 AH6 K=0 THEN 170 


140 IF M=1 THEN 290 
150 IF Y>HI THEN 170 

160 HY=V+l:POKE 5R+10+20«HY,234:N=1:GO 
TO 290 

170 S=5+6D:IF 5*9>LEN(B$) THEN S=5-l 
180 IF S/6=INT(S/6} AH6 5<>0 THEN LK::L 
K-66:F0R 1=0 TO 3:P0KE 53248+I,LK+CI*2 
4);NEKT I 

190 CH=CHtliCH=CH-2M(CH=3):IF 5<1 THEN 
5=5+1 

200 IF BEO0 THEN GOSUB 350 

210 IF LI=8 THEN SETCOLOR 4i8.INT(FU/3 

3) 

220 POSITION 6,12}? tt6:B$(5,S+9)iPOKE 
756.PEEK(106)+4+(6»(CH=2)) 

230 IF BS(5+4,5+4)0"$" ANO EM=0 THEN 
60 

240 56UN6 3,40+(EY«2),86,14:lF £H=0 TH 
EN EH=1:EH=10 !EY=HsE5=GB 
250 IF EH=10 ANO EY=Y THEN POKE 5R+EK+ 
20«EY,0:GOTO 1150 
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TIPIANDO: continuación 


th% POKE 5R*EB+2t«CV,e:EY=EY-líEH=CH+E 

S»(»<^CS>:1F EK=15 OR EX=6 OR EV=1 TH 
EN EH=e:SOUNR 3>RiR.e:G0T0 6» 

278 IF EK=18 AN8 EV=V THEN 1158 
288 POKE SR*EK*28«EV,15Í560T0 68 
288 R=PEEI(C5R+18*(28»tMV+l)))SlF R<>8 

AN8 R0138 OR HY=12 THEN BSCBO,BOJ=" '* 
;605UB 318:SOTO 178 

388 POKE 5R+18+28íH1Y,8!HV=MY+l!P0KE SR 
n8«28«HV,178:G0TD 178 
318 8AT8 i.S*a>u.i.D 
328 RE5T0RE 318:B$CS*4,5+4)='‘ ":POKE 5 
Rtl8*28«MY,8: K:8;80=5+4 5 BE=8:H=8;S0UN8 
8,28,8,14:50UN8 1,255,18,15 
338 5C=SC+S8*<R=3 OR R=6)+28»{R=1 OR R 
=5)+5*ÍR=118 OR R=128 OR R=121>+i5»(R= 

4) 

348 P05ITI0N 5,17:? II6J‘'PUNT0-")5C:IF 
R=232 THEN 5H=1:G0T0 1158 
358 IF LI=1 THEN 5ETC0L0R 4,1,14 
368 IF BE=2 THEN 50UN8 8,8,8,e:50UHD i 
8 8 8 

378 BE=(BE+l):REft8 E$íB$CB0,B0)=E5!lF 
BE05 THEN RETURN 

388 B$IBO,BO)=‘' '".IF 11=1 THEN SETCOLO 
R 4,8.8 

398 8E=8:50UH8 8,8,8,8:S0UN» 1,8,8,8:8 
OTO 178 

488 IF H808 THEN 158 

418 IF V<12 THEN POKE 5R+18+28*Y,8 

428 SOUNO 3,8,8,e:P0=P0+l!50UH8 2,9+PO 

,64,15 

438 V=V+l:V=V-(V>12)SP0KE 5R+18+28*Y,1 
72-68 

448 5=5+68lIF HIT=8 THEN L=L+l:IF L=28 
THEN 50UN8 2,8,8,8:G0T0 1358 
458 IF 5/6=181t5/6) THEN LK=LX-68:F0R 
Iz8 TO 3: POKE 53248 + 1 , LK+(24«):NEKT I 
468 IF 5)1 AN8 5+9<LEN(B$) THEN 498 
478 IF HIT=1 THEN 1218 
488 IF HIT=8 THEN 1158 
498 P05ITI0N 6,12;? lt6jB8lS,5+9);IF Y= 
12 AN8 HIT=8 THEN R=PEEKÍ5R+18+28*12); 
IF ROO THEN 1158 

588 IF HIT=1 THEN IF Y=12 THEN 1218 
518 GOTO 418 

528 H8=t«-l:B$<5+3,5+5)=" ";POKE 5R+ 
18+28»12.8:Y=ll:50UH8 1,68,18,ISsFOR T 
=1 TO 28:NEKT T:50ÜN8 1,68,18,15 
538 P05ITI0N 5,21»? tl6;"5ftLMA80-"j4-MA 
548 FOR T=1 TO 38;NEKT T;50UN8 1,8,8,8 
:60T0 178 

558 8ftTA 8,96,152,04,52,24,255,153,255 


,24,8,255,165,255,165,255,165,131 
568 BATA 32,8,8,8.0,254,198,238,238,48 
8,8,8,8,8,8,8,85,255.48,0,248,144,248, 
144,255,153,249 

578 BATA 88,129,66,36,24,24,36,66,129, 

448,88,168,72,74,68,16,16,16 

588 BATA 56,8,8,8,8,24,24,24,24,64,8,8 

,8,8,8,8.24,24,72,24,126,255.153,24,24 

,24,24,88,24,68,68,24,24,24,24,24 

598 BATA 448,8,8,22,25,78,116,84,68,45 

6,2,15,73,167,211,114,34,34,464,255,8, 

8,8,8,O,8,8 

688 BATA 328,8,8,8,24,84,56,16,48 
618 BATA 336,8,8,16,12,16,8,8,8,544,12 
8,192,248,228,255,56,112,8,368,1,3,31, 
39,255,28,14,8 

628 BATA 96,255.255,255,255,255,255,25 
5,255 

638 BATA 48.8,8,255,178,178,178,178,17 

8 

648 BATA -1 

658 POKE 186,PEEK(186)-6:GRAPHICS 17:5 
TART=PEEK(186)*256 5 POKE 752,1:RESTORE 
558 

668 REAB KtlF X=-l THEN 688 

678 FOR Y=0 TO 7:REAB Z:POKE K+Y+START 

,Z;NEHT Y:GOTO 660 

688 POKE 186,PEEK(186)-6!5TART=PEEK(ie 
6}*256:RE5T0RE 718 

698 REAB X:IF X=-l THEN POKE 756,PEEK( 
186)+6:RETURN 

780 FOR Y=8 TO 7;REAB ZsPOKE K+Y+START 
,Z:NEKT Y{GOTO 698 

718 BATA 8,12,58,84,88,48,255,153,255, 

24,0,255,165,255,165,255,165,131 

728 BATA 32,8,8,8,8,254,198,238,238,48 

8,8,8,8,8,8,8,178,255,48.8,248,144.248 

,144,255,153,249 

738 BATA 88,8,8,231,24,24,231,8,8,448, 

88,168,72,74,68,16,16,16 

748 BATA 56,0,8,0,8,24,24,24,24,64,8,8 

,8,0,8,8,24,24,72,24,126,255,153,24,24 

,24.24,88.24,68,68,24,24,24,24,24 

758 BATA 448,8,8,22,25,78,116,04,68,45 

6,2,15,73,167,211,114,34,34,464,255,6, 

8 , 8 , 0 , 8 , 8,8 

768 BATA 328,8,8,0,24,16,56,84,48 
778 BATA 336,8,8,0,28,8,8,8,8,344,128, 
192,248,228,255,56,112,8,368,1,3,31,39 
,255,28,14,8 

780 BATA 96,255,255,255,255,255,255,25 
5,255 

798 BATA 40,8,8,255,178,178,178,170,17 
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TIPIANDO: continuéción 


e 

«M OATA -i 

810 Q ««vx$y SI yy«xx«y& 

!tt vy yxy xy$ vt$ $lt • $$$ xw (3 xxy 
Myxxtfxww$$$ B $ !xv yv i lilJJ4J » 

820 IF H<2 THEH 840 
830 8$=>1iaSi$« «ytfvxi3S$$$$ 
vx$$4í$$«xía$$$$!$$ $$!$$$<$$ $$ m x$ $$ 
t MI $$$$$ x«y$$$<Mi$!llZi3" 

840 60=l:POKE 82.0:BO=10:EH=O 

850 FOR T=1 TO 12:P0SITI0B 0,T; ? ttS}'*® 

nViPOSITIOR 16,T;? tt6;‘ — *'!REÍIT 

II 

860 P05ITION 0,1:? «6s« H—— 

W 

870 H=»Hl:60SU6 940;H1=1O-M:IF HKl TH 
EN HI=1 

880 HA=4:P0SITI0M S.HI:? ... 

OH 16,HI:? #6}" " 

890 P05ITI0N S,21¡? l♦6;••RE5CUE0-‘■;4-MA 
900 FOR 1=0 TO 3:P0KE S3248FI,95t(m4 
}:NEXT I 

910 P05ITI0R 5,17:? ll6j‘‘PURTO>'‘; 5C;» . 
'•;P05ITIOPI 5,19:? «6;"RiyEL-";Hj‘* 
";LK=95 

920 IF LI=0 THEN SETCOLOR 0,0,16:SETCO 
LOR 1,12,8{SETC0L0R 3,7,6i5ETC0L0R 2,3 
,6:RETURM 
930 RETURN 

940 OATA 0,6,7,7,15,31,31,31,127,255,2 
55,0,0,128,200,252,252,252,255,255,255 
,255,0,2,7,15,31,63,127,255,255,255 
950 OATA 255,0,0,128,192,224,224,224,2 
25,243,255,255 

960 OATA 0,0,0,0,0,0,0,0,0,0,0,38,16,1 

6,56,56,124,124,124,124,124,124 

970 OATA 30,16,16,56,56,124,124,124,12 

4,124,124,0,0,0,0,8,0,0,0,0,0,0 

980 IF H/2=INT(H/2) THEN RESTORE 968:L 

I=líSETCOLOR 0,O,0:SETCOLOR 1,0,O:SETC 

OLOR 2,3,6;SETC0L0R 3,0,O:SETCOLOR 4,8 

,0!G0T0 1000 

998 RESTORE 940:LI=8:SETCOLOR 4,8,12 
1000 FOR H=0 TO 3:REA0 C:POKE 704+H,C 
1010 FOR l=START4-512+PVfU28*H) TO STA 
RT+521«PV«(128»H}:REA0 ZtPOKE 1,Z:NENT 
I:NEXT H 
1020 RETURN 
1030 K=95;PY=&8 

1040 A=PEEK(106)*4:POKE 106,A:PDKE 542 
79,A:START=256«A;P0KE 559,46:P0KE 5327 
7,3 


1050 FOR I=START4512 TO START«i024:POr 
E I,0:NEKT 1 

1060 FOR H=0 TO 3:P0KE 53248^H,X*(H«24 
}:P0K£ 532564^»,3 
1070 NEXT H 

1080 POKE 623,4:RETURN 
1090 0L1ST=PEEK (560) +PEEK (561)«(256: POK 
£ 0LISTn7,i34:REST0RE 1106:FDR 1=1536 
TO 1562 

1108 OATA 72,169,6,141,10,212,141,26,2 
08,169,14,141,22,208,169,224,141,9,212 
,173,122,210,141,24,208,104,64 
1110 REAO M:POKE I,H:NEKT I:POKE 512,0 
1120 POKE 0LIST?28.7:P0SITI0N 3,23l? U 


COMBATIENDO 


1130 POKE 5Í3,6:P0KE 54286,192:SR=PEEK 
(88)«256Nf>EEK (89) 

1140 RETURN 

1150 COTO 1190 

1160 POKE SR4EK4>20HEV,0 

1170 POKE SR4m20»V,0 

1180 POSITION 9,0:? ll6:"(ai8“:60TO 1350 

1190 SH=SH-l:POSITION 94SH,0:? 116;'* *' 

1200 PD=0:HIT=1:GOTO 410 

1210 H1T=0 

1220 0L4=0LI5Ti4: 0L5=0LIST4'S :NUHL=PEEK 
(0L4) :NUm=PEEK (0L5) :P0=-2e 
1230 POSITION 10,V:? R6;" "JlF eH=l TH 
EN POSITION EX,EV:? N6;'* *' 

1240 FOR T=1 TO 32:CO=INT(RNO(1)N16)F1 
:S£TCOLOR 4,C0,2 
1250 F=F+l:IF F>4 THEN F=1 
1260 P0=(F=1)-(F=2)-(F=3)*(F=4) 

1270 NUN.=NUHL4P0:P0KE 0L4,NÜNL:P0KE O 
LS.NUHH 

1280 SOUNO 0,200,4,15:SOUNO 1,255,4,15 
:SOUNO 2,225,4,15:S0UH0 3,1S0,4,1S:NEX 
T T:FOR T=0 TO 3;S0UN0 T,0,O,0:NEKT T 
1290 EH=O:FU=506:V=5 
1300 S=S*t5<l)-((S*9)>LEN(0S)) 

1310 IF LI=0 THEN SETCOLOR 4,8,10 
1320 IF Ll=l THEN SETCOLOR 4,0,0 
1330 IF SH=0 THEN 1160 
1340 GOTO 170 

1350 60SUB 136O:SC=O:H=0:S=l:€OTO 50 
1360 IF SH<>0 THEH POP ¡GOTO 50 
1370 POSITION 3,23:? N6j'‘CONBATIENOO 
'*:IF SOHl THEN HI=SC 
1380 POKE 77,254:1F STRI6(0)=1 THEN PO 
SITIOH 5,1$:? tt6;*'FIN JUEGO ‘':GOTO 13 
80 

1390 SH=3;P0KE 77,0 

1400 RETURN • 
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BASIC 



TURBO 

BRSkC 


Esta poderosa versión de BASIC ya está disponi- 
ble en kioskos para los lectores de MUNDO A TARI. 
En este número continuamos desarrollando una 
síntesis de sus comandos, para Que ustedes puedan 
adentrarse en sus características de operación. 




DEL desde, hasta 

Sorra las líneas mencionadas en los paráme¬ 
tros desde y hasta, ambos inclusive. 


RENUM vie, nue, incr 

Renumera las líneas desde vie. Las nuevas lí¬ 
neas empiezan en nue y se incrementan por incr. 


DUMP 

DUMP filespec 

Esta orden lista las variables y sus respectivos 
valores que se utilizan en un programa (o que se 
encuentran en la memoria). DUMP "P:" pasa esta 
lista a la impresora. 

Un ejemplo: 


A =100 

B=(10.1 

C(0,0 


Variable numérica 

Arreglo. Dl'M B(9) ó DIMB(9, 0) 

Arreglo no dimensionado 
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BASIC 


D(10, 10 
E$10,20 
F$0,0 
G$0,10 
H PROC 100 
I #120 


DIM D(9,9) 

String, LEN = 10, DIM E$ (20) 
String no dimensionado 
DIM G$(10), LEN (G$) =0 
PROC H en la línea 100 
Marca 1 en la línea 120. 


J? 


Marca o PROC no definidos 

TRACE 
TRACE + 

Conecta e! TRACE. Esto quiere decir que el 
número de cada línea ejecutada es señalada entre 
paréntesis cuadrados [ ] 

TRACE - 

Desconecta el TRACE. El TRACE también es 
desconectado al aparecer un error. 


* B 

* B + 

Después de esta orden la pulsación de la te¬ 
cla BREAK será tratada como cualquier otro error. 
Una interrupción del programa puede ser evitada 
meniante la orden TRAP. 

Desconecta la función anterior. Después de 
RUN se ejecuta automáticamente * B — 


NUEVAS ORDENES 

(NOTA: *»equivalea...enATARI BASIC) 


MOVE también sirve para llenar un registro 
de la memoria: POKE DPEEK(88), 128: MOVE 
DPEEK(88) + 1,959. 

BPUT#n, adr. leu 

Escribe un bloque. 

FOR I = 0 TO len - 1. PUT # n. PEEK 
(adr + l): NEXTI. 

BGET #n,adr, len 

Lee un bloque 

FOR I = 0 TO len -1: GET#n,A: POKE 
adr + l, A: NEXTI, 

Con estas órdenes es posible tener acceso a da¬ 
tos almacenados en disco a una velocidad máxima: 

OPEN # 1, 8, 0, "D;DIBUJO.PIC": BPUT # 1. 
DPEEK(88), 7680: CLOSE#! 

OPEN # 1, 4, 0, ''D:DIBUJO'P!C": BGET * 1. 
DPEEK(88).7680; CLOSE#1 

Para almacenar o cargar dibujos de un modo 
gráfico 8 (o bien 9, 10. 11, 15) en disco, NOTA; 
el número 7680 varía según el modo gráfico con 
que se esté trabajando. 

o/o PUT 

Con esta orden se pueden almacenar datos (en 
disco) de una manera más comprimida y rápida. 


o/o GET 

Para cargar los datos que previamente hayan 
sido almacenados con o/o PUT. 


DPOKE adr, word 

POKE de doble byte POKE adr. word 
- 256 * INT (word/256): POKE adr + 1, INT 
(word/256). 


FILLTOx.y 

Es la forma más corta de POSITION x, y: 
XIO 18,#6,0,0, "S:” 


MOVE source, dest, count 

Transferencia de bloques FOR I = 0 TO 
COUNT - 1: POKE dest + 1, PEEK(source + I): 
NEXT I 

Por ejemplo, con el comando MOVE 57344, 
NEWCHARSET. 1024 se puede copiar el set de 
caracteres. 

— MOVE source, dest, count 

Transferencia de bloques. Ofrece la posibili¬ 
dad de mover una sección de la memoria a una 
dirección más alta, sin que los datos salgan daña¬ 
dos cuando se sobrepasen (cuando source + count 
>dest). 

FOR I = COUNT - 1 TO 0 STEP - 1: 
POKE dest+ 1); NEXTI. 


CLS 

CLS#6 

Borra la pantalla gráfica. 

PUTn 

? CHR$(n). Ejemplo PUT 253 = ? CHR$ 

(253) 

GET key 

«►OPEN #7, 4,0, "K:”: GET #7, key: 

CLOSE #7. 

DIM 

Al dimensionar una variable o un string, su 
contenido es borrado automáticamente; 
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BASIC: continuación 


DIM A(IOO) '**■ DIM A(100}: FOR I - 0 
TO 100: A(l) =0: NEXT I. 

INPUT "texto", var, var 
INPÜT "texto"; var, var 

Este INPUT es ahora muy parecido al utiliza¬ 
do en el MICROSOFT BASIC y ahorra muchos 
PRINT. Con el INPUT “ A se consigue un IN- 
PUT sin el a veces molesto signo ?. 

TEXTx.y. sexp 
TEXT X, y, exp 

Escribe texto en un modo gráfico. Las coorde¬ 
nadas X, y se cuentan en pixels. 

Ejemplo: GRAPHICS 8; TEXT 50,90, “TUR¬ 
BO BASIC": TEXT 70.95,1000. 

Con esta orden no es posible el scrolling. 

CIRCLE xO, yO.r 

Dibuja un círculo cuyo centro es xO. yO con el 
radio r.' Si son metidos dos radios diferentes esto 
dará origen a una elipse. 

PAINT x, y 

Rellena una figura cerrada con el color elegido 
mediante COLOR. 

PAUSE n 

Retrasa la ejecución de la siguiente orden du¬ 
rante n/50 segundos. En ATARI BASIC se suele 
utilizar A = 1 "1, pero en TURBO-BASIC esto 
resultaría muy de prisa. En lugar de ello se puede 
utilizar por ejemplo: PAUSE 9. 

DSOUND volee, freq. d¡*. vol 

Parecido al SOUND normal. El ATARI puede 
comprimir dos voces en una sola. La frecuencia^ 
entonces de 16 bits {0..65535) en vez de 8 bits 
(0..255). La frecuencia resultante es entonces de. 

1789790/(2 * freq + 14} en vez de 63921/(2 
freq+ 2). (cálculos en Hz). 


SOUND 

DSOUND 

Abreviación para: 
1,0,0,0: NEXT l. 

GLOSE 

Abreviación para: 
*1: NEXT! 


FOR I = 0 TO 3: SOUND 


FOR I = 1 TO 7: CLOSE 


(secreto del) 
ATARI WRITER 


Hemos recibido una colaboración del señor 
Nolberto Arriagada, actual jefe del Departamento 
de Computación e Informática del Liceo Munici¬ 
pal "Luisa Ravanal Palma" de la Ilustre Municipa¬ 
lidad de Chile Chico, conjuntamente con el profe¬ 
sor de Castellano don Raúl Machuca L. 



£/ próximo número continuaré esta columMwn 
descripción de funciones y comandos para la Unidad de 
Disco. Nuevos ejemplos ayudarán en la mejor aplicación 
de este poderoso lenguaje. 


Estos profesionales normalmente están emi¬ 
tiendo informes, tests, cuestionarios, pruebas, etc. 
y han logrado la siguiente experiencia: 

1. Con el Superexaminador se carga un tema 
cualquiera desde el casete y se graba en un 
disco que tiene lo§ archivos del DOS. sabiendo que 
el programa agrega la extensión ALT. Acto seguido 
se apaga el computador dejando encendida la uni¬ 
dad de disco. 

2 Se inserta el cartridge ATARI Writer (o la ver¬ 
sión Plus en disco). Se enciende el computa¬ 
dor. Al aparecer el menú se elige la letra N y pre¬ 
sionando simultáneamente las teclas OPTION L 
se carga el archivo antes mencionado. Al aparecer 
en pantalla el texto presionamos SELECT T simul¬ 
táneamente y a partir de entonces se tienen todas 
las bondades del ATARI Writer (eliminar, mover, 
caracteres internacionales, etc.) 

Las conclusiones sobre este secreto revelado 
las dejamos a juicio de los lectores. 

MUNDOATARI agradece la colaboración 
enviada y deja abierta la columna para otros 
lectores que deseen participar en este enriquece- 
dor intercambio de posibilidades del ATARI. 
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PROGRAMAS 


\ 

Utilitarios para el Orive 



DOS 4.0 


Esta versión del Sistema Operativo permite 
una mayor cantidad de opciones de trabajo, como 
son las siguientes; 

P : Copiar sectores 
Q : Chequear sectores 
R : Convertidor hexadecimal a decimial 
S : Verificar velocidad de diskettera 
T ; Eliminar comprobación para acelerar veloci¬ 
dad de copia. 

Este Sistema Operativo está disponible en el 
Catálogo y debería encontrarse en su biblioteca 
personal de programas, 


aprovechar los 360 Kb de almacenamiento de la 
nueva diskettera. 

A diferencia del Sparta DOS, es una versión 
muy similar a los tradicionales del ATARI {DOS 
2.5), pues presenta un menú con alternativas de 
tareas. 


TURBO BASIC XL 



El nuevo lenguaje BASIC estructurado está 
siendo comentado en detalle en una columna de 
continuidad a partir de MUNDOATARI No.16. 


La versión en diskette forma parte de una 
promoción de venta en kioskos, a un precio reba¬ 
jado de $ 400. 

Resérvelo en su kiosko habitual. 


SMART DOS 



Este es otro Sistema Operativo que permite 
trabajar con la XF-551 para formatear los diskettes 
en la opción doble lado/doble densidad, y así 


BASIC XL 



Esta nueva versión de BASIC de la OSS Sys¬ 
tem es una novedad de MUNDOATARI para sus 
lectores ávidos de nuevos programas. 
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PROGRAMAS: continuación 


COMPILADOR 
TURBO BASIC 


^ e r» ^ I c >ci 

X.I cc> 19«V rraiMi •stréwsKl 

rarM •**<$ VI Conptl«r versión l.i I 

»SSSSSXSf5S8S22=='i-“=-="====-====S 

Michos Presrorm solí conpiitort w*roon-> 

Cobon 5 to fuorst Sio i «ufw«r{ snumver 
iwischcn i uno 9 «1(1. uno wsMon dos 
rrosroHM Oonn mt don 9 lr>lt}^t«n 
*> *. t uno «. Sinn ftCTURM d'uc^on. 

control o : RucS.KOhr zun 005 I 
Control R s Roboot I 


Una de las ventajas del TURBO BASIC es la 
posibilidad de compilar directamente en máquina 
mediante un utilitario adicional disponible en 
nuestro local. 




ATARI PILOT 


TtSRI PILOT tCJ C0RVR16HT OTORl 

í”” 1 
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EQUIPOS 


XF-551 


MUNDOATARl proporciona a los 
usuarios de casete este periférico 
a precio de costo. Ver Catálogo. 



En este número se continúa con el manejo y cono¬ 
cimiento de la XF-551 En este número veremos 
los comandos para poner a punto la fecha y hora 
de operación de su computador. 


TIME y DATE 

Estos comandos son de gran utilidad para re¬ 
conocer o diferenciar archivos similares en nombre. 

El Sparta DOS graba en el directorio la fecha 
y tiempo real del archivo. Si usted tiene como 
forma de trabajo el actualizar la fecha y tiempo 
al inicializar el Sparta todos sus archivos serán 
inicializados de acuerdo a ello. 

Al inicializar el Sparta y digitar; DOS aparece 
la imagen que indica la foto: 


Digite la instrucción TIME, como indica la 
siguiente pantalla: 


MtTZMEg 


H SCA»V 
■ »OS 


¥*r ¿.¿i 

Copyrifht <C> ay ICD. inc 


Presione RETURN, después de lo cual apa¬ 
rece la siguiente pantalla: 


v«r 3.2c 

CC> 1996 by ICO. IftC 


ros 

011| 


SportbOOS Vfr 


copyrisbt (C) 

IS-*- f: ICO, Xnc . 

faíOOV 


005 


01:txnc 


Cvrr«nt ti»*-. 

. 4 • “ 

ífttpr * tr 

■ 
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EQUIPO: continuación 


Ingrese ei tiempo actual utilizando el formato: Ingrese la nueva fecha con el formato: 

HORA: MINUTO: SEGUNDO y AM o PM según MES-DIA-AÑO 


corresponda 



De esta manera usted actualiza el reloj interno 
a los nuevos valores ingresados. 

Para comprobar la acción realizada llame nue¬ 
vamente a la función TIME y observará que hay 
una variación con respecto a la anterior. Ver foto 
con nuestro ejemplo: 


copyrf9bt cc) 

é.t€ st'Jan 

-eo 

1)06 tey ic». 

Inc . 

kiépy 

00) 



ti : TIHC 

Curr««>t tif** » s 

3:47.05pH 


fnt«r n«w ti»*!: : 

r : 4». lOFH 


Di:T irc 

Cyrr»fvt «sn* ; ^ 

4 S •• 16p** 


Ent*r ri.»v tiwf 

■ 



Para actualizar la fecha digite: RETURN y 
presione la tecla RETURN. Ver foto: 



Para comprobar que la fecha fue actualizada 
correctamente digite nuevamente el comando 
DATE y verá la siguiente imagen: 



3 . 3 >y }in at 1 

t ■• 9 b bv í •' f' 1 : ■ 

«EOOY 

005 

1 

Oí: TIK 

Curr*n t ti •»<? \ a 

Entar níw ti«- 

1 ' • C T , «• 1 

01 : 1 1 

C ut r pn 1 t 1 p. - » > 

íftt^r r.; w : . •'r 

' \ i • 

01 :DaU 

r w ■-.» -3 j ^ \ 1 s 

E fíter 1 ^ w .1 í ' 

l 

01:DAIt 

1 Cur r «ni 14:.- • 

1 nrv 

j ; 

■ 


Amigo lector, nos interesa saber especial¬ 
mente su opinión acerca de esta columna. Ella es 
muy importante para poder orientar su conti¬ 
nuidad y,enfoque en el tiempo. 

Escríbanos a casilla 458-11, Santiago. 
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ATARI en las regiones 


En tos casi S años que han transcurrido desde su 
creación, más de 1.000 alumnos de los diferentes 
colegios municipalizados de la comuna de Iquique 
han ingresado ai fascinante mundo de la informá¬ 
tica a través de! Laboratorio de Computación de! 
Centro Comuna! Extraescolar. 


Los estudiantes de Enseñanza Media y Básica 
reciben allí la instrucción de un programa conce¬ 


bido "no para transformarse en programadores, 
sino para vincularse con un mundo cada vez más 
computarizado", según explica ta profesora Gla¬ 
dys Cisterna, encargada de la unidad. 

El laboratorio está implementado con 12 com¬ 
putadores ATARI 800 XL. 2 impresoras 1025, 
2 caseteras y 2 disketeras, elementos suficientes 
para entregarles a los estudiantes las bases del 
lenguaje BASIC e incentivarles el sentido de crea¬ 
tividad. 
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EDUCACION: continuación 


AÑO PROVECHOSO 

La profesora entiende que la experiencia ha 
sido muy positiva y ha permitido a la comuna 
nortina quedar a la altura de las grandes ciudades 
del país, donde se iniciaron con anterioridad pro¬ 
gramas similares. 

- La idea nuestra es trabajar con grupos de 
niños en los sistemas de extraescolaridad, para lo 
cual los objetivos de nuestro trabajo es propor¬ 
cionar al alumno un canal adecuado para el uso 
racional y positivo del tiempo libre— explica. 

Con esa idea, el Laboratorio de Computación 
inició sus actidades con 30 alumnos de Enseñanza 
Media, que a poco andar ya estaban capacitados 
para el uso elemental del computador. 

Gracias a esa experiencia y a 2 años de labor, 
los estudiantes iquiqueños participaron en un 
encuentro interregional científico, donde mos¬ 
traron una experiencia nueva para la zona el 
año 1986. Al año siguiente tomarpn parte en la 
Feria del Mundo Joven, etapa comunal, a partir 
de la cual se sentó el precedente de la computa¬ 


ción. como elemento necesario para la instruc¬ 
ción escolar y la capacitación profesional o labo¬ 
ral del futuro. 

- Los frutos del trabajo se manifiestan cuan¬ 
do se ve que jóvenes que estuvieron aquí hace 
3 ó 4 años aprendiendo los primeros pasos, ya 
están estudiando alguna carrera relacionada con 
el área— cuenta la maestra. 

El Laboratorio Computacional cuenta con 
el apoyo de los recursos suministrados por MUN- 
DOATARI: Prueba de Aptitud Académica, Bases 
de Datos, Planillas Electrónicas y en general todo 
aquello que está dirigido a las materias curricu- 
lares. 

De este modo, en casi 5 años de experiencia, 
la Coordinación Comunal Extraescolar, organismo 
de la Corporación Municipal de Desarrollo Social 
de Iquique ha impulsado un sisterna que pa^e del 
aprovechamiento racional y positivo del tiempo 
libre del escolar, para llegar a la formación de 
elementos sociales debidamente capacitados para 
adentrarse en un mundo que exige cada vez más 
de sus profesionales una cultura computacional. 


Instituto de Sistemas 
MUNDOATARI 


Presentamos los primeros 30 módulos que se ofrecen para atender 
en forma personalizada sus necesidades en el manejo de su ATARI 


A modo ilustrativo se presenta a continuación 
el contenido de 2 cursos de 8 bits: 


Manejo básico para principiantes 

(Sbit-OOV 

Contmidot: 

1. Descripción del hardware. 

2. Inicialización de su configuración. 

3. Manipulación del teclado. 

4. Manipulación del Self-test. 

5. Medios magnéticos. 

6. Inicialización de diskette. 

7. Duplicación de software en diskette. 

8. Inicialización de casete. 

9. Duplicación de software en casete. 

10. Inicialización de lenguaje BASIC. 


El detalle de los cursos ofrecidos por el liisti- 
tuto de Sistemas figura en la próxima página. 


Programa gráfico SYNGRAPH 

(Sbit^OIS) 

Conten idos 

1. Descripción del software. 

2. Inicialización de software y diskette de datos. 

3. Uso de teclas especiales. 

4. Ingreso de datos. 

5. Tipos de gráficos. 

6. Creación de un gráfico. 

7. Manipulación de parámetros para gráficos. 

8. Almacenamiento de un gráfico. 

9. Editar un gráfico. 

10. Imprimir un gráfico. 
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EDUCACION: continuación 


NOMINA DE CURSOS PARA EL ATAR! DE 8 BITS 


CMigo 

Nombre del curso 

Nivel 

No. horas 

Valor 

8 bit-001 

Manejo básico 

principiante 

3 

$ 2.600 

8 bit-002 

Sistema Operativo DOS 2.5 


3 

2.600 

8 bit-003 

Procesador de Texto ATARI Writer 

inicial 

3 

2.600 

8 bit-004 

Procesador de Texto ATARI Writer 

avanzado 

2 

3.000 

8bit-005 

Planilla de Cálculo SYNCALC 

inicial 

3 

2.600 

8 bit-006 

Planilla de Cálculo SYNCALC 

avanzado 

2 

3.000 

8 bit-007 

Base de Datos SYNFILE 

inicial 

3 

2.600 

8 bit-008 

Base de Datos SYNFI LE 

avanzado 

2 

3.000 

8 bit-009 

Lenguaje BASIC 

módulo A 

3 

2.600 

8bit-010 

Lenguaje BASIC 

módulo B 

3 

2.600 

8bft-0n 

Lenguaje BASIC 

módulo C 

3 

2.600 

8b¡t-012 

Lenguaje BASIC 

módulo D 

3 

2.600 

8bit-013 

Lenguaje BASIC, Manejo-archivo 

inicial 

3 

3.000 

8bit-014 

Lenguaje BASIC, Manejo archivo 

avanzado 

3 

3.600 

8 bit-015 

Programa Gráfico SYNGRAPH 


3 

2,600 



Código 

Nombre del curso 

Nivel 

No. horas 

Valor 

16 bit-001 

Manejo básico 

principiante 

4 

$ e.ecfe: 

16 bit-002 

Trucos iniciales 


2 

4.600 

16 bit-003 

Procesador Texto PIRST WORD 

inicial 

4 

6.600 

16 bit-004 

Procesador Texto FIRST WORD 

avanzado 

4 

6.600 

16bit-005 

Hoja de Cálculo VIPGEM 

módulo VG1 

4 

6.600 

16 bit-006 

Hoja de Cálculo VIPGEM 

módulo VG2 

4 

6.600 

16 bit-007 

Hoja de Cálculo VIP GEM 

módulo VG3 

4 

6.600 

16 bit-008 

Hoja de Cálculo VIP GEM" 

módulo VG4 

4 

6.600 

16 bit-009 

Hoja de Cálculo VIP GEM 

módulo VG5 

4 

6.600 

16bit-010 

Base de Datos DBMAN 

módulo DBM1 

4 

6.600 

16bit-011 

Base de Datos DBMAN 

módulo DBM2 

4 

6.600 

16bit-012 

Programa Gráfico PRINTMASTER 


4 

6.600 

16bit-013 

Programa Arquitectura EASY-DRAW 

módulo EDI 

4 

6.600 

16bií-014 

Programa Arquitectura EASY-DRAW 

módulo ED2 

4 

6.600 

16 bit-015 

Programa de Pintura DEGAS ELITE 


4 

6.600 
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•t«* '-t. v' ‘ 


.V. W\>ÁX1&ÍI\ OíStíSfc- ^ 


-7/-^r^Q| ZONA FRANCA 
Z-LJl íll IQUIQUE 


Otros niveles de programación. 


MUNDOATAR!, en su viaje por las regiones del 
país, mostraré a sus lectores detalles de empresas 
que utilizan el recurso de la computación para 
optimizar su funcionamiento. 

Estos artículos orientarán a nuestros amigos 
sobre fas posibilidades reales de la programación 
en computadores para el Chile del mañana. El 
ATAR! es un computador que permite explorar 
ese mundo y preparara para manejar otros equi¬ 
pos de mayor envergadura posteriormente. 


ZOFRI es un área comercial e industrial den¬ 
tro de la ciudad de Iqutque que goza de extrate¬ 
rritorialidad para efectos de aduana, o sea, es 
como si estuviera ubicado en el extranjero. 


En su interior encontramos; 

— Almacenes públicos 

— Almacenes particulares 

— Industrias 

— Areas de módulos de comercialización 

— Areas de administración de ZOFRI 

— Servicios 

La información que se mueve en esta área está 
definida como mercaderías de comercialización o 
producción en ZOFRI (industrial). 

El volumen de diferentes ítems asciende a la 
suma 250.000 y están especificadas por sus des¬ 
cripciones y características de comercialización. 

Imaginemos el manejo de este enorme volu¬ 
men de información sin la ayuda de la computa- 
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ción. El problema creado con el atraso y número 
de empleados involucrados limitaría la comercia¬ 
lización expedita de las mercaderías. 

Para ese manejo se requiere de un programa 
específico, conocido como Banco de Datos. 

Cada mercadería corresponde a un registro o 
su equivalente tarjeta de inventario en un kárdex 
para un sistema manual. 

El equipo o hardware, es vital para manipu¬ 
lar esta información. El requerimiento fundamen¬ 
tal es una memoria adecuada con el volumen de 
información procesada. Para el caso de ZOFRI el 
equipo en cuestión es un WANG US 65, con 4 
megabytes de memoria principal y está conectado 
con 38 terminales. 

La ZOFRI es una herramienta de comercio 
exterior que permite agilizar las operaciones de 
importación de productos extranjeros al país, que 
es más ágil gracias a la ayuda de sistemas y equi¬ 
pos computacionales en la regulación y control 
del flujo de mercaderías. 

Con este gran banco de datos las tareas a 
realizar se orientan a controlar y verificar la au¬ 
tenticidad de la información de traspaso de pro¬ 
ductos por las distintas áreas de ZOFRI: 

- Ingreso al recinto de ZOFRI 

— Salida a otras zonas: 

- a módulos 

- a Primera Región 


- a otros países 

- al resto del país. 

Este sistema fue elaborado por el equipo de 
programación de ZOFRI y logra mayor eficiencia 
con el control y servicio de información actuali¬ 
zada 3 sus usuarios. 

Las posibilidades futuras cx)ntemplan modifi¬ 
caciones para disminuir la burocracia y transfor¬ 
marla en un ejemplo de manipulación de datos. 
Adicional mente cuenta con otros sistemas: 

— Contabilidad y facturación 

— Control de activos 

— Bienestar 

— Encuestas ocupacionales 

— Control de correspondencia. 

Mención especial corresponde al correo elec¬ 
trónico. que conecta información entre los dife¬ 
rentes departamentos para: 

— Enviar mensajes 

— Verificar su lectura 

— Archivarlos ordenadamente 

— Calendario de compromisos 

— Programar reuniones. 

La conclusión de nuestra nota es que la com¬ 
putación es una herramienta imprescindible para 
el impulso de empresas como el caso de ZOFRI 
en la Primera Región. 



Tú eres un as de la fuerza aérea 
piloteando un F-14 Thunder Cat. 
Eres la perfecta combinación hombre- 
máquina, y deberás demostrarlo en 
esta misión en la que estarás solo con¬ 
tra cientos de enemigos. 

Misión: AFTER BURNER 

El enemigo ha desarrollado una 
estrategia que le permitirá conquis¬ 
tar el mundo libre y lo ha escondido 
en diferentes lugares de su país. 

Inteligencia naval ha descubierto 


la ubicación pero necesita de esos 
planos para atacar. 

Tu tarea consiste en encontrar 
los planos, para lo que cuentas con 
misiles aire-aire y un cañón Vutcan 
de 20 mm. Debes completar 18 
etapas de combate aéreo, descender 
en los lugares asignados y finalmente 
volver al portaaviones, intacto. 

La gráfica del juego es destacadle, 
tanto por la animación como por la 
dinámica. No dejes de adquirirlo. 


RESULTADO SORTEO 
VIDEO ATARI 

Una noticia que todos esperaban: 
— Tal como se hab/a anunciado se 
procedió a efectuar el primer sorteo 
de un equipo de VIDEO ATARI, 
ante público asistente en nuestro lo¬ 
cal. uno de los cuales, Dennis Kangme 
Jaksic del Liceo Luis Campino, pro¬ 
cedió a extraer el volante ganador de 
nuestro buzón. 

Resultó premiado nuestro lector: 

Omíos Ramírez Otea, domiciliado en 
Castillo Urizar 3061, Depto. 31, de 
Santiago. 

Se ruega a nuestro feliz ganador 
ponerse en contacto con nuesto lo¬ 
cal para hacer entrega del premio. 

Felicitaciones. 
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El UH-IX es un nuevo heli¬ 
cóptero experimenta! de alto 
rendimiento y utiliza lo más nue¬ 
vo en sistemas de control elec¬ 
trónico y sofisticación. 


Su estructura está basada en 
las series de los helicópteros 
Bell y está construido con un 
material de fibra de cartón y 
moldeado para tener caracten's- 
ticas aeorodinámicas óptimas y 
poco peso. 

El sistema defensivo incluye 
cohetes que pueden ser armados 
en grupos de 4 y- disparados a 
intervalos de 1 segundo. A am¬ 
bos lados del fuselaje están mon¬ 
tadas 2 ametralladoras que se 
disparan una tras otra. La provi¬ 
sión máxima es de 16 cohetes y 
2.000 municiones para cada 
ametralladora. 


El UH-IX tiene característi¬ 
cas de alta velocidad y largo al¬ 
cance, útiles para el reconoci¬ 
miento o el rescate. Su arma¬ 
mento le proporciona una de¬ 
fensa adecuada. 


INSTRUMENTOS 

FRE: Transmisión de alcance 
omnidireccional VHF de u- 
na estación o base local. Utili¬ 
zada por el computador de na¬ 
vegación para establecer un rum¬ 
bo a la estación. 

NAV: Punto del compás com¬ 
putado desde la transmixión 
VOR (1). El control VOR puede 
utilizarse para copiar este rumbo 
al modo automático (2) o seguir¬ 
lo en forma manual. 

RAD: El radar se activa entran¬ 
do en el modo de combate 


(control LAR): Esta lectura le 
proporciona el alcance visual del 
rastro del radar desde el heli¬ 
cóptero 

ARM: Aparecen los números 1, 
2, 3 ó 4 para indicar que co¬ 
hetes se encuentran en los tubos 
de lanzamiento. Las luces indi¬ 
can cuales están armados y listos 
para disparar. 

HDM: Con este control se pue¬ 
de lanzar un dispositivo au- 
todirigido, con un alcance de 20 
millas. El rumbo para volver al 
punto de lanzamiento se exhibe 
y transmite aquí. 

RES: Exhibe el rumbo transmi¬ 
tido por e! dispositivo auto- 
dirigido. Utilizado por el perso¬ 
nal de tierra para ubicarse. 
LUCES INDICADORAS: Los 
sistemas de control automá¬ 
ticos encenderán el indicador 
apropiado en caso de existir al- 
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aigún desperfecto en cualquier 
sistema electrónico. 

FULL: Indicador de combusti¬ 
ble. 

01L: Medidor de presión de a- 
ceite. 

' TMP; Medidor de temperatura 
del motor. 


DETALLE DE TABLERO 
DE INSTRUMENTOS 


1. Frecuencia radial. 

2. Visor de dirección, 

3. Alcance (rastreo de radar). 

4. Indicadores del estado de 
hetes y luces de armamento. 

5. Rumbo de frecuencia auto- 
dirigido. 

6. Rumbo de frecuencia de res¬ 
cate. 

7. Luces indicadoras del estado 
de sistemas. 


8. Medidor de combustible. 

9. Medidor de presión de aceite 

10. Medidor de temperatura del 
motor. 

11. Medidor de deslizamiento 
de RPM del motor. La zona 
verde indica nivel normal. 

12. Indicador digital de RPM. 

13. Indicador digital de RPM 
del rotor. 

14. Indicador de deslizamiento 
de las RPM del rotor.. 

15. Medidor de la presión del 
múltiple. Indica la potencia 
de salida del motor. El com¬ 
putador detiene el motor a 
un nivel muy alto para evi¬ 
tar ruptura. 

16. Compás magnético. Se dígi¬ 
ta y corrige para marcar el 
norte real en 000. 

17. Horizonte artificial. 

18. Pantalla del computador de 
a bordo. 

19. Medidor de la inclinación 
del colectivo. El valor 0 in¬ 


dica ángulo completamente 
bajo. 

20. Medidor anti-torsión. Indica 
nivel de compensación por 
medio del rotor de cola. 

21. Ubicación automática del 
curso, que seguirá mientras 
no haya control manual. 

22. Medidor de deslizamiento 
del altímetro. 

23. Indicador digital del altíme¬ 
tro. 

24. Indicador digital del velocí¬ 
metro. 

25. Medidor de deslizamiento 
del velocímetro. 

26. Amperímetro {indicador del 
generador). 

27. Temperatura del escape. La 
lectura óptima es cuando se 
encuentra en el centro. 

28. Temperatura de mezcla en 
el carburador. 

29. Luces indicadoras de desper¬ 
fectos en la mayoría de los 
instrumentos. 
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PROGRAMAS: continuación 




nEDUCin EMPUJE 
ASCENCIONAL 


botón 

pretlonado 


REDUCIR 

ACELERADOR 


AUMENTAR 

ACELERADOR 


AUMENTAR EMPUJE 
ASCENCIONAL 


tón hasta que llegue a ese núme¬ 
ro. 

Mediante la tecla SELECT 
puedes activar el rotor de cota, el 
cual se regula automáticamente 
a la velocidad del motor. 

Cuando la velocidad sea su¬ 
ficiente presiona el botón y 
mueve el joystick hacia atrás. 
De esta forma apreciarás cómo 
el helicóptero comienza a elevar¬ 
se lentamente. 

Una vez arriba puedes usar 
los distintos comandos para ob¬ 
tener los que necesites. Los co¬ 
mandos son los siguientes: 

0 Teclas directas: 

ESC: Inicializa los sistemas com- 
putacionales. 

START: Pone en marcha el mo¬ 
tor 

SELECT: Pone en marcha el ro¬ 
tor, 

0 Digitar 3 letras: 

ABT: Abortar misión. 

ACS: Corrección de curso. 

ASN: Selección de misión. 

CLM; Informe climático. 

DST: Cálculo de distancia desde 
el punto de despegue. 

STK: Cuadri'cula de mapa te¬ 
rrestre. 

LAR: Carga de cohetes, 

MAC: Activa ametralladoras. 
POW: Potencia. 

RAD: Activa radar. 

TRK: Localización de objetivos 
en el radar. 

VSI: Lectura de velocidad verti¬ 
cal. 

XXX: Cancelar comando ante¬ 
rior, 

0 Misiones: 

INS: Instrucción de vuelo. En¬ 
trenamiento controlado por 
el computador. Instruccio¬ 
nes simples. 

EXP: Exploración.Vuelo de ins¬ 
pección sobre un territorio 
inexplorado. 

COM: Combate. 

RSC: Rescate. La misión con¬ 
siste en localizar personal 
extraviado, transmitir rum¬ 
bo y distancia. Si es posible 
se puede intentar el rescate. 
La capacidad máxima es 2. 


MUNDOATARI 


MANEJO 

Una vez cargado el juego 
aparecerás ante la cabina del he¬ 
licóptero. Presiona la tecla ESC 
y luego dígita el comando ASN. 
Entonces puedes escoger una mi¬ 
sión. 

Presiona a continuación la 
tecla OPTION. Al digitar el co¬ 


mando POW inicializas los siste¬ 
mas de turbinas. Presiona luego 
la tecla START y podrás apre¬ 
ciar como aumentan las revolu¬ 
ciones del motor. 

Al estabilizarse éstas debes 
aumentarlas a 3.300 moviendo 
el joystick hacia la izquierda 
manteniendo presionado el bo- 


MOVIMIENTOS DEL JOYSTICK 


AUMENTAR EMPUJE 
DELANTERO 


REDUCIR EMPUJE 
DELANTERO 
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TIMON GIRO 
IZQUIERDA 


botón 

libre V. i 


TIMON GIRO 
DERECHA 


VIRAJE 

IZQUIERDA 

aiROSO° 


VIRAJE 
DERECHA 
GIRO 90° 


TIMON GIRO 
IZQUIERDA 


TIMON GIRO 
DERECHA 
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M NER 204g'er 


Este es un juego de habilidad en 
el que diriges a Mike. simpático per¬ 
sonaje que se encuentra encerrado en 
una mina con mushos laberintos. 

En el transcurso del juego debes 
descubrir el recorrido de cada etapa, 
pero estarás con el tiempo en contra. 
En cada etapa encontrarás unos seres 
invasores que puedes atacar mientras 
te sonríen. 

Para maniobrar necesitas usar el 
jovstlck y para saltar utiliza el botón. 




Más 

juegos... 

E.T. (El extraterrestre) 



Elliot es la única salvación para 
E.T,, que está atrapado en la Tierra. 

Ellos necesitan reunir una cierta 
cantidad de objetos para construir 
un equipo transmisor, con el que 
E.T. podrá comunicarse con su 
planeta. 

Elliot debe entonces buscar las 
piezas que le pida su amigo extra- 
terrestre V llevárselas de a una cada 
vez. Es importante esquivar la acción 
de los investigadores de la NASA. 

Mientras se mueve Elliot se pue¬ 
de acelerar con el botón rojo. Con 
el mismo botón se toma o deja una 
pieza encontrada. 

Este es un juego contra el tiempo. 


Si tuviéramos que Inventar un le¬ 
ma para este juego, el más acertado 
sería: "salta por tu vida". En efecto, 
el juego consiste en que tú, montado 
en un "jumper" (saltador), debes ir 
esquivando los obstáculos que se 
presentan. En caso contrario serás 
simplemente destruido. 

La evaluación final es buena. 


Continuación del aclamado juego 
de Datasoft, con más acción y com¬ 
bates cuerpo a cuerpo. 

Tu misión es dirigir un grupo de 
comandos que debe invadir una isla 
y capturar al comandante de ésta. 
Para ello debes introducir ^ todos los 
soldados que puedas, lanzándolos en 
helicóptero y luego guiándolos por 
los obstáculos. 

Luego debes destruir con una 
ametralladora todos los objetivos que 
encuentres. Por último guiarás un 
helicóptero para entrar en la fortaleza 
para destruir todo lo que encuentres 
antes de enfrentarte con el coman¬ 
dante en combate cuerpo a cuerpo, 
lanzándose palos. 
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PROGRAMAS: continuación 



PHARAOH'S PYRAMID 

Novedad en videojuegos. Se trata 
de las aventuras de Achmed, un sim¬ 
ple esclavo, durante el reino de los 
faraones en Egipto, para libertar a 
su amada. 

Q)n la tecla Select eliges el ni¬ 
vel de dificultad. Con Option selec¬ 
cionas la categoría entre esclavo y 
farón. Con el botón empieza la ac¬ 
ción. 

El juego consiste en realizar mo¬ 
vimientos oblicuos para que Ach¬ 
med descienda o suba de peldaño en 
peldaño en la pirámide para cambiar 
el color según la muestra, además 
debe contrarrestar el efecto de una 
serie de seres que deshacen su traba¬ 
jo realizado. 



Sensacional juego de otras marcas, 
ahora disponible para ATARI de 8 
bits. 

Pilotea tu fabuloso avión de com¬ 
bate táctico Harrier en peligrosas mi¬ 
siones. Primero debes partir desde un 
portaaviones, base de operaciones 
(puedes efectuar despegue vertical si 
lo deseas), y luego lanzarte hacia las 
más arriesgadas misiones. 

Hay 5 niveles de dificultad. 


Apasionante juego espacial en el 
que debes combinar la destreza con 
la estrategia. 

Tu misión es introducirte con tu 
veloz nave espacia) en galaxias ene¬ 
migas, con el objetivo de juntar unos 
poderosos cristales con los que po¬ 
drás salvar la Tierra de una terrible 
lluvia cósmica capaz de destruir la 
flora del planeta. 


En este juego te verás convertido 
en el capitán del famoso destructor 
alemán, durante la Segunda Guerra 
Mundial. 

Tu misión es dirigirte a la zona 
del conflicto y participar activamente 
en el combate. 

Entretenido juego que combina 
la estrategia pura (»n algunas pan¬ 
tallas de acción. 
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Todos los meses 2 títulos de Regalo (NUEVOS) 


SECCION 8 BIT CASETE 


Todos ios meses 3 títulos de Regalo (NUEVOS) 

SECCION 8 BIT DISKETE 

Todos los meses 3 títulos de Regalo (NUEVOS) 


EQUIPOS EN DEMOSTRACION PERMANENTE 


INFORMATE EN LA DIRECCION QUE TE CORRESPONDE 
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ARGENTINA 

calle Venezuela 2095 (1096) 


CHILE MUNDOATARI 
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@ 2320557 









LO ftüE USTED 
ESPERABA 
UAA UAIDAD 
DE DISCO 

POR i 75.990 

IVA INCLUIDO 
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Sistema Operativo 
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* Manual Sparta 2 
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Formatiados con 360 k 
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